home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Netware Super Library
/
Netware Super Library.iso
/
pgm_tool
/
lu62
/
attlnck.c
< prev
next >
Wrap
C/C++ Source or Header
|
1995-07-03
|
3KB
|
87 lines
/*******************************************************************/
/* */
/* */
/* ATTACH_LENGTH_CHECK */
/* */
/* Function: this procedure checks the lengths of the fields in */
/* the ATTACH header */
/* */
/* input : the FMH-5 attach header */
/* */
/* output: return code : */
/* x'00000000' no error */
/* x'10086000' fmh length not corrected */
/* not used x'10086005' access security information length */
/* is invalid */
/* x'10086009' an invalid parameter length */
/* not used x'10086011' an invalid value for the "logical */
/* unit of work" *
* *
* CopyRight 1995. Nicholas Poljakov all rights reserved. *
* *
********************************************************************/
#include <fmh5.h>
#include <state1.h>
#include <string.h>
unsigned long attltck(att_ptr)
char *att_ptr;
{
struct FMH5 *a_ptr;
unsigned long code;
unsigned offset;
#if OS_TYPE == 1
/********* Trace facility **********/
unsigned int rtype; /* type of record */
unsigned int pnum; /* point number */
char pname[8]; /* name of module */
char *drec; /* record for dump */
int lenr; /* record length */
rtype = INPROC;
strcpy(pname, "attlnck");
pnum = 1;
drec = att_ptr;
lenr = 200;
gtf(rtype, pname, pnum, drec, lenr);
/***********************************/
#endif
code = 0;
a_ptr = (struct FMH5 *)att_ptr;
offset=5;
if (a_ptr -> length <= offset)
{
code=0x10086000; /*fmh length is invalid*/
goto exit_pgn;
}
if (a_ptr -> lnflp < 3)
{
code=0x10086009; /*invalid param length*/
goto exit_pgn;
}
offset += (a_ptr -> lnflp) + 1; /*+value of the fixed length*/
/*the tp name length field*/
if (a_ptr -> length <= offset)
{
code=0x10086000; /*fmh length is invalid */
goto exit_pgn;
}
offset += (a_ptr -> lntpn) + 1; /*+tp name length field */
/*access securuty field*/
if (a_ptr -> length < offset)
{
code=0x10086000; /*fmh length is invalid */
goto exit_pgn;
}
/* Here we not use an "access security" and a "logical unit of work" */
exit_pgn :
return(code);
}